home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 21 / Cream of the Crop 21 (Terry Blount) (October 1996).iso / math / coeli376.zip / INSTALL.BAT < prev    next >
DOS Batch File  |  1996-07-30  |  5KB  |  269 lines

  1. @echo off
  2.  
  3. cls
  4. Echo NOTE TO DISTRIBUTORS:
  5. Echo This installer will only work if the source drive is a floppy with 
  6. Echo COELI376.EXE in the root directory along with INSTALL.BAT
  7. Echo. 
  8. Echo IF YOU HAVE PLACED THE ABOVE FILES IN YOUR OWN ARCHIVE ON THE FLOPPY
  9. Echo THIS UTILITY WILL NOT WORK.
  10. Echo.
  11. Echo Your A: drive directory should look something like this:
  12. Echo.
  13. Echo Volume in drive A is COELI376   
  14. Echo Volume Serial Number is 3C5D-0FEA
  15. Echo Directory of A:\
  16. Echo.
  17. Echo VESA         {DIR}         05.05.96    7.25
  18. Echo COELI376 EXE       459 544 05.05.96    7.22
  19. Echo FILELIST DOC         1 947 05.05.96    7.36
  20. Echo DISTRIB  TXT         1 415 05.05.96    7.31
  21. Echo INSTALL  BAT         2 813 05.05.96    7.27
  22. Echo INSTALL  TXT         3 757 05.05.96    7.39
  23. Echo        7 file(s)        469 476 bytes
  24. Echo                         709 632 bytes free
  25.  
  26. Echo.
  27. Echo.
  28.  
  29. Pause
  30.  
  31. set adr=A:
  32. set cdr=C: 
  33. set cp=\COELI-3
  34. set vdr=N
  35.  
  36.  
  37. :start
  38.  
  39. cls
  40.  
  41. Echo COELI - ELECTRIC PLANISPHERE - INSTALLATION
  42. Echo -------------------------------------------
  43. Echo.
  44. Echo.
  45. Echo 1) Read  installation instructions
  46. Echo 2) Print installation instructions
  47. Echo 3) Attempt automatic installation
  48. Echo 4) Exit
  49. Echo.
  50. Echo.
  51. choice /c:1234 Answer by number  - 
  52.  
  53. Echo.
  54. Echo.
  55.  
  56. if errorlevel 4 goto end
  57. if errorlevel 3 goto Auto_installation
  58. if errorlevel 2 goto Print_instructions
  59. if errorlevel 1 goto Read_instructions
  60.  
  61.  
  62. :Print_instructions
  63.  
  64. cls
  65. if exist INSTALL.DOC goto do_print
  66. goto dont_print
  67.  
  68. :do_print
  69.  
  70. Echo Please ensure your printer is ready and on line.
  71. Echo To cancel, press [CTRL]+C
  72. Echo.
  73. Pause
  74. cls
  75. Echo Please wait. Printing installation instructions...
  76.  
  77. copy INSTALL.DOC PRN >NUL
  78.  
  79. Echo.
  80. Echo Printing complete.
  81. Echo.
  82. Pause
  83. Goto start
  84.  
  85.  
  86.  
  87. :dont_print
  88. Echo Sorry. Can't find the file INSTALL.DOC
  89. Echo.
  90.  
  91. :out_print
  92. pause
  93. goto start
  94.  
  95.  
  96.  
  97. :Read_instructions
  98.  
  99. cls
  100. Echo Reading Coeli installation instructions...
  101.  
  102. if exist install.doc goto do_read 
  103. goto dont_read
  104.  
  105. :do_read
  106.  
  107. type install.doc |more
  108.  
  109. Pause
  110. goto out_read
  111.  
  112. :dont_read
  113.  
  114. Echo Can't find the file INSTALL.DOC...
  115.  
  116. :out_read
  117.  
  118. goto start
  119.  
  120.  
  121.  
  122. :Auto_installation
  123.  
  124. CLS
  125.  
  126. Echo COELI - AUTOMATIC INSTALLATION
  127. Echo ------------------------------
  128. Echo.
  129. Echo.
  130.  
  131. choice /c:abcdefghi Type the drive-letter you're installing FROM - 
  132.  
  133. if errorlevel 9 SET adr=I:
  134. if errorlevel 8 SET adr=H:
  135. if errorlevel 7 SET adr=G:
  136. if errorlevel 6 SET adr=F:
  137. if errorlevel 5 SET adr=E:
  138. if errorlevel 4 SET adr=D:
  139. if errorlevel 3 SET adr=C:
  140. if errorlevel 2 SET adr=B:
  141. if errorlevel 1 SET adr=A:
  142.  
  143. Echo Source drive is %adr%
  144.  
  145. :next_q
  146.  
  147.  
  148. choice /c:abcdefghi Type the drive-letter you're installing TO - 
  149.  
  150. if errorlevel 9 SET adr=I:
  151. if errorlevel 8 SET adr=H:
  152. if errorlevel 7 SET adr=G:
  153. if errorlevel 6 SET adr=F:
  154. if errorlevel 5 SET adr=E:
  155. if errorlevel 4 SET adr=D:
  156. if errorlevel 3 SET adr=C:
  157. if errorlevel 2 SET adr=B:
  158. if errorlevel 1 SET adr=A:
  159.  
  160. Echo Target drive is %cdr%
  161. Echo A directory called %cp% will be created on your target drive.
  162. Echo.
  163. choice /c:yn Shall we proceed with installation - 
  164.  
  165. If errorlevel 2 goto start
  166.  
  167. :phase_1
  168.  
  169. Echo.
  170. Echo Please wait. Starting installation...
  171.  
  172. %cdr%
  173.  
  174. md %cp%
  175.  
  176. if exist %adr%\COELI376.exe copy %adr%\COELI376.exe %cp%
  177.  
  178. cd %cp%
  179.  
  180. if exist COELI376.exe COELI376
  181.  
  182. if exist COELI376.exe del COELI376.exe
  183.  
  184. md vesa
  185. cd vesa
  186. md univbe50
  187. cd univbe50
  188. md doc
  189.  
  190. cd ..
  191. cd ..
  192. cd ..
  193.  
  194. if exist %adr%\vesa\univbe50\univbe.exe copy %adr%\vesa\univbe50\*.* %cp%\vesa\univbe50
  195. if exist %adr%\vesa\univbe50\doc\univbe.doc copy %adr%\vesa\univbe50\doc\*.* %cp%\vesa\univbe50\doc
  196. if exist %cp\vesa\univbe50\univbe.exe set vdr=Y
  197.  
  198. choice /c:yn Attempt to install Vesa driver  - 
  199.  
  200. if errorlevel=2 goto phase_2
  201.  
  202.  
  203. :Vdr_install
  204.  
  205. Echo.
  206.  
  207. if %vdr%==Y Echo Attempting to install Vesa driver...
  208.  
  209. %cdr%
  210. cd %cp%
  211. vesa\univbe50\univbe
  212.  
  213.  
  214.  
  215. :phase_2
  216.  
  217. %cdr%
  218. if exist %cp%\coeli.exe cd %cp%
  219.  
  220. cls
  221. Echo.
  222. choice /c:yn Print Coeli's single-page key guide -  
  223.  
  224. if errorlevel=2 goto end
  225.  
  226.  
  227. :Print_keyguide
  228.  
  229.  
  230. if exist coelikey goto do_kprint
  231. goto dont_kprint
  232.  
  233. :do_kprint
  234.  
  235. Echo.
  236. Echo Please ensure your printer is ready and on line.
  237. Echo To cancel, press [CTRL]+C
  238. Echo.
  239. Pause
  240. Echo.
  241. Echo.
  242. Echo Printing help sheet...
  243.  
  244. copy COELIKEY PRN >NUL
  245.  
  246. Echo.
  247. Echo Printing complete.
  248. Echo.
  249. Pause 
  250.  
  251.  
  252. :dont_kprint
  253.  
  254.  
  255. :end
  256.  
  257.  
  258. Echo.
  259. Echo Thanks. Have fun with Coeli!
  260. Echo.
  261. Echo.
  262. Echo.
  263.  
  264.  
  265.  
  266.  
  267.  
  268.  
  269.